object frmAddItem: TfrmAddItem Left = 317 Top = 158 BorderIcons = [biSystemMenu] BorderStyle = bsSingle Caption = 'Plan New Program Start' ClientHeight = 490 ClientWidth = 400 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] OldCreateOrder = False Position = poMainFormCenter Scaled = False OnCreate = FormCreate OnDestroy = FormDestroy DesignSize = ( 400 490) PixelsPerInch = 96 TextHeight = 16 object btnOK: TButton Left = 222 Top = 456 Width = 80 Height = 25 Action = acFromList Anchors = [akRight, akBottom] Default = True ModalResult = 1 TabOrder = 0 end object btnCancel: TButton Left = 310 Top = 456 Width = 80 Height = 25 Anchors = [akRight, akBottom] Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 1 end object pcBackground: TPageControl Left = 8 Top = 8 Width = 385 Height = 439 ActivePage = TabSheet1 Anchors = [akLeft, akTop, akBottom] TabOrder = 2 object TabSheet1: TTabSheet Caption = 'TabSheet1' object lblTitle: TLabel Left = 8 Top = 8 Width = 361 Height = 57 AutoSize = False Caption = 'Select the program that you want to have started automatically w' + 'hen Windows starts and then click OK.' WordWrap = True end object lvPrograms: TAxListView Left = 8 Top = 68 Width = 361 Height = 301 HorzScrollBar.Range = 50 VertScrollBar.Range = 10 TrackingScroll = True DoubleBuffered = True Sections.Font.Charset = DEFAULT_CHARSET Sections.Font.Color = clWindowText Sections.Font.Height = -11 Sections.Font.Name = 'Arial' Sections.Font.Style = [fsBold] Sections.HeaderTextOffset = 5 Sections.ItemsOffset = 5 Sections.HeaderHeight = 17 Sections = <> RowSelect = True HotTrackStyle.HighlightFont.Charset = DEFAULT_CHARSET HotTrackStyle.HighlightFont.Color = clWindowText HotTrackStyle.HighlightFont.Height = -11 HotTrackStyle.HighlightFont.Name = 'MS Sans Serif' HotTrackStyle.HighlightFont.Style = [] Style = lsHeadered Header.Font.Charset = DEFAULT_CHARSET Header.Font.Color = clWindowText Header.Font.Height = -12 Header.Font.Name = 'Arial' Header.Font.Style = [] Header.Sections = < item ImageIndex = -1 Width = 0 AllowResize = False end item ImageIndex = -1 Width = 50 AllowResize = False end item AutoSize = True ImageIndex = -1 Text = 'Programs' Width = 311 end> Header.Height = 18 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False ParentShowHint = False TabOrder = 0 OnDblClick = lvProgramsDblClick OnDrawSubItem = lvProgramsDrawSubItem end object btnBrowse: TBitBtn Left = 8 Top = 377 Width = 97 Height = 25 Caption = 'Browse...' TabOrder = 1 OnClick = btnBrowseClick Glyph.Data = { 82000000424D8200000000000000760000002800000005000000030000000100 0400000000000C00000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DD0DD000D000 D00000000000} Layout = blGlyphRight end end end object ilPrograms: TImageList BkColor = clWindow DrawingStyle = dsTransparent Height = 32 Width = 32 Left = 280 Top = 288 end object ilSelected: TImageList BkColor = clHighlight DrawingStyle = dsTransparent Height = 32 Width = 32 Left = 280 Top = 328 end object alAddPrograms: TActionList OnUpdate = alAddProgramsUpdate Left = 312 Top = 168 object acFromList: TAction Category = 'Add' Caption = 'OK' OnExecute = acFromListExecute end object acLocalDisks: TAction Category = 'Add' Caption = 'Search on Local Disks...' OnExecute = acLocalDisksExecute end object acStartMenu: TAction Category = 'Add' Caption = 'Search in Start Menu...' OnExecute = acStartMenuExecute end end object pmBrowse: TPopupMenu Left = 312 Top = 200 object miStartMenu: TMenuItem Action = acStartMenu end object miLocalDisks: TMenuItem Action = acLocalDisks end end object dlgOpenFile: TOpenDialog Filter = 'Applications|*.com;*.exe;*.bat;*.cmd' Options = [ofHideReadOnly, ofNoChangeDir, ofFileMustExist, ofEnableSizing, ofDontAddToRecent] Title = 'Open' Left = 312 Top = 128 end end